home *** CD-ROM | disk | FTP | other *** search
/ Risc World 3 / Risc World 3.iso / SOFTWARE / ISSUE4 / ZAP / !Zap / Modules / !ZapJRF / Scripts / FileHead < prev    next >
Text File  |  2002-05-08  |  1KB  |  64 lines
  1. CUP
  2. | Basic
  3. #IfModeN Basic
  4.  SPLITLINE
  5.  UP
  6.  INSERTFILE "*<ZapInserts$Dir>.BASIC.ProgHead"
  7. #EndIf
  8. | Asm
  9. #IfModeN Asm
  10.  #IfText "In "
  11.   DOWN:DOWN:SRIGHT
  12.   #IfText "Module"
  13.    DELTOEND:INSERT "AOF"
  14.   #Else
  15.    #IfText "AOF"
  16.     DELTOEND:INSERT "Utility"
  17.    #Else
  18.     #IfText "Utility"
  19.      DELTOEND:INSERT "Module"
  20.     #EndIf
  21.    #EndIf
  22.   #EndIf
  23.  #Else
  24.   INSERTFILE "<ZapInserts$Dir>.Assembler.ProgHead"
  25.  #EndIf
  26.  CUP:DOWN:CRIGHT
  27. #EndIf
  28. | C, C++ & Java
  29. #IfModeN C,C++,Java
  30.  | Is there something already there ?
  31.  #IfText "/**"
  32.   CRIGHT
  33.   LEFT:LEFT:LEFT
  34.   #IfText "RCS"
  35.   #Else
  36.    CRIGHT
  37.    INSERT " RCS"
  38.    DOWN:CLEFT
  39.    INSERTFILE "<ZapInserts$Dir>.C.RCSHead"
  40.    SEARCHFORWARD "\< `*`*`*"
  41.    CLEFT
  42.    INSERTFILE "<ZapInserts$Dir>.C.RCSTail"
  43.   #EndIf
  44.   SEARCHFORWARD "`*/"
  45.   CRIGHT:DOWN:CLEFT
  46.  #Else
  47.   INSERTFILE "<ZapInserts$Dir>.C.ProgHead"
  48.   UP:UP:CRIGHT
  49.   DATE "%dy %m3 %ce%yr"
  50.   CUP:DOWN:CRIGHT
  51.  #EndIf
  52. #EndIf
  53. | HTML
  54. #IfModeN HoTMeal
  55.  CUP
  56.  INSERTFILE "<ZapInserts$Dir>.HTML.Head"
  57.  CDOWN
  58.  INSERT "</body>"
  59.  CUP
  60.  SEARCHFORWARD "</"
  61.  LEFT:LEFT
  62. #EndIf
  63. UPDATEWINDOW
  64.